object nagform: Tnagform Left = 317 Top = 239 BorderIcons = [] BorderStyle = bsNone Caption = 'Nag Screen' ClientHeight = 318 ClientWidth = 531 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object About_Panel1: TPanel Left = 0 Top = 0 Width = 531 Height = 318 Align = alClient TabOrder = 0 object TransImage11: TTransImage Left = 16 Top = 8 Width = 200 Height = 200 Picture.Data = {} PictureMask.Data = {} end object Label131: TLabel Left = 232 Top = 32 Width = 281 Height = 33 AutoSize = False Caption = 'Svenna�s Win Menu 98' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = 'Comic Sans MS' Font.Style = [fsBold, fsItalic, fsUnderline] ParentFont = False Transparent = True end object Label141: TLabel Left = 224 Top = 96 Width = 51 Height = 13 Caption = 'Shareware' end object Label151: TLabel Left = 233 Top = 112 Width = 194 Height = 26 Caption = 'This is app shareware. but if you use this FREE registration it�' + 's yours.' Transparent = True WordWrap = True end object Image11: TImage Left = 440 Top = 72 Width = 75 Height = 103 AutoSize = True Picture.Data = {} end object Label161: TLabel Left = 24 Top = 200 Width = 88 Height = 13 Caption = 'Sven Tore Iversen' end object Label191: TLabel Left = 24 Top = 264 Width = 57 Height = 13 Caption = 'Pasopvg 56' end object Label201: TLabel Left = 24 Top = 280 Width = 95 Height = 13 Caption = '1279 OSLO Norway' end object URLLabel11: TURLLabel Left = 24 Top = 224 Width = 109 Height = 13 Cursor = crHandPoint LabelType = hmMAIL AllowDown = True Effect98 = True Caption = 'svenna@cybergal.com' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object URLLabel21: TURLLabel Left = 24 Top = 240 Width = 111 Height = 13 Cursor = crHandPoint Effect98 = True Caption = 'home.sol.no/~svenive/' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Button21: TButton Left = 400 Top = 264 Width = 75 Height = 25 Caption = '&Register' TabOrder = 0 OnClick = Button21Click end end object Timer1: TTimer Interval = 5000 OnTimer = Timer1Timer Left = 304 Top = 256 end end